home *** CD-ROM | disk | FTP | other *** search
/ FishMarket 1.0 / FishMarket v1.0.iso / fishies / 501-525 / disk_505 / thedatinggame / unpackdisks < prev    next >
Text File  |  1992-05-06  |  1KB  |  43 lines
  1. .K ""
  2. echo "This script will unpack the following lharc archives:"
  3. echo ""
  4. echo "  FlipDisk1.LZH    =>    FlipDisk1:"
  5. echo "  FlipDisk2.LZH    =>    FlipDisk2:"
  6. echo ""
  7.  
  8. ask "Do you have two blank disks ready?"
  9. if not WARN
  10.     echo "Try again when you do ..."
  11.     echo "All Done.  Click close gadget to get rid of window."
  12.     endcli
  13. endif
  14.  
  15. ask "Is floppy drive df1: ready with the first blank?"
  16. if not WARN
  17.     echo "You will need to do the unpacking yourself."
  18.     echo "All Done.  Click close gadget to get rid of window."
  19.     endcli
  20. endif
  21.  
  22. echo "Formatting and unpacking disk."
  23.  
  24. sys:system/format drive df1: name FlipDisk1 noicons
  25. :c/lharc -x -a -m x FlipDisk1.LZH  FlipDisk1:
  26. echo "Done with the first disk."
  27. echo ""
  28. ask "Is floppy drive df1: ready with the second blank?"
  29. if not WARN
  30.     echo "You will need to unpack the second disk yourself."
  31.     echo "All Done.  Click close gadget to get rid of window."
  32.     endcli
  33. endif
  34.  
  35. echo "Formatting and unpacking disk."
  36.  
  37. sys:system/format drive df1: name FlipDisk2 noicons
  38. :c/lharc -x -a -m x FlipDisk2.LZH  FlipDisk2:
  39. echo "Done with the second disk."
  40. echo ""
  41. echo "All Done.  Click close gadget to get rid of window."
  42. endcli
  43.